home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C/C++ Users Group Library 1996 July
/
C-C++ Users Group Library July 1996.iso
/
listings
/
v_10_01
/
cips1001.exe
/
HT.C
< prev
next >
Wrap
Text File
|
1990-09-08
|
16KB
|
591 lines
/**************************************************
*
* file d:\cips\ht.c
*
* Functions: This file contains
* display_using_halftoning
* half_tone
* show_half_tone
* get_threshold_value
*
* Purpose: This program displays an image using a half
* toning process. The algorithm was taken from
* "Personal computer based image processing with
* halftoning," John A Saghri, Hsieh S. Hou, Andrew
* Tescher, Optical Engineering, March 1986, Vol.25,
* No. 3, pp 499-503. The display_using_halftoning
* determines display size and reads the image.
* The half_tone function implements the algorithm
* shown on page 502 of the article.
*
* The function print_halftone_array prints a half
* toned image array to a regular line printer.
*
*
* External Calls:
* rtiff.c - read_tiff_image
* rstring.c - read_string
* numcvrt.c - get_integer
*
* Modifications:
* 30 September 86 - created
* 18 August 1990 - modified for use in the
* C Image Processing System.
*
**************************************************/
#include "d:\cips\cips.h"
#define FORMFEED '\014'
float eg[ROWS][COLS], ep[ROWS][COLS];
display_using_halftoning(in_image, file_name,
il, ie, ll, le, threshold, invert,
image_colors, image_header, monitor_type,
print, show_hist, color_transform)
char color_transform[], file_name[], monitor_type[];
int image_colors, invert,
il, ie, ll, le, threshold,
print, show_hist;
short in_image[ROWS][COLS];
struct tiff_header_struct *image_header;
{
char response[80];
int a,
b,
channel,
color,
count,
data_color,
display_mode,
horizontal,
i,
j,
k,
l,
line_color,
max_horizontal,
max_vertical,
not_finished,
one,
vertical,
x,
x_offset,
y,
y_offset,
zero;
float area, new_grays;
unsigned long histogram[256], new_hist[256];
if( (show_hist == 1) &&
(color_transform[0] != 'H'))
zero_histogram(histogram);
/*******************************************
*
* Use the monitor type to set the vertical
* horizontal and display_mode parameters.
* Also set the values for one and zero.
* one and zero will vary depending on the
* monitor type.
*
********************************************/
if( (monitor_type[0] == 'M') ||
(monitor_type[0] == 'm')){
vertical = 3;
horizontal = 2;
display_mode = _HRESBW;
one = 1;
zero = 0;
}
if( (monitor_type[0] == 'C') ||
(monitor_type[0] == 'c')){
vertical = 3;
horizontal = 2;
display_mode = _MRES4COLOR;
one = 3;
zero = 1;
}
if( (monitor_type[0] == 'V') ||
(monitor_type[0] == 'v')){
vertical = 6;
horizontal = 4;
display_mode = _VRES16COLOR;
one = 5;
zero = 1;
}
if( (monitor_type[0] == 'E') ||
(monitor_type[0] == 'e')){
vertical = 6;
horizontal = 3;
display_mode = _ERESCOLOR;
one = 5;
zero = 1;
}
max_horizontal = (image_header->image_length+50)/100;
max_vertical = (image_header->image_width+50)/100;
if(horizontal > max_horizontal) horizontal = max_horizontal;
if(vertical > max_vertical) vertical = max_vertical;
if(print == 1){
vertical = 1;
horizontal = 1;
}
/****************************************
*
* If color transform wants histogram
* equalization, then read in the
* image arrays and calculate the
* histogram. Zero both the histogram
* and the new_hist. You will need the
* new_hist if you want to display the
* equalized hist.
*
*****************************************/
if(color_transform[0] == 'H'){
count = 1;
zero_histogram(histogram);
zero_histogram(new_hist);
for(a=0; a<vertical; a++){
for(b=0; b<horizontal; b++){
x = a*100;
y = b*100;
printf("\nHT> Calculating histogram");
printf(" %d of %d",count,vertical*horizontal);
count++;
read_tiff_image(file_name, in_image, il+y,
ie+x, ll+y, le+x);
calculate_histogram(in_image, histogram);
} /* ends loop over b */
} /* ends loop over a */
} /* ends if display_mode == H */
/* set graphics mode */
if(print == 0)
_setvideomode(display_mode); /* MSC 6.0 */
else{
printf("\n\nHT> Calculating for printing ");
printf("\nHT> Counting from 0 to 99\n");
}
/*********************************************
*
* Loop over horizontal and vertical. Read
* the image array and display it after
* calculating the half tone values.
*
*
* If you want to show the histogram AND
* do not want to do hist equalization
* then calculate the hist from the
* original image array.
*
* If you want to do hist equalization
* then calculate the new_hist AFTER
* the image has been equalized.
*
* We will equalize the histogram down
* to half the original shades of gray
* and will cut the threshold in half.
*
*****************************************/
for(i=0; i<horizontal; i++){
for(j=0; j<vertical; j++){
read_tiff_image(file_name, in_image, il+i*100,
ie+j*100, ll+i*100, le+j*100);
if( (show_hist == 1) &&
(color_transform[0] != 'H'))
calculate_histogram(in_image, histogram);
if(color_transform[0] == 'H'){
area = ((long)(vertical))*((long)(horizontal));
area = area*10000.0;
new_grays = image_colors/2;
perform_histogram_equalization(in_image,
histogram, new_grays, area);
calculate_histogram(in_image, new_hist);
} /* ends if color_transform == S */
if(color_transform[0] == 'H')
half_tone(in_image, threshold/2, eg, ep, i, j,
one, zero, invert, print);
else
half_tone(in_image, threshold, eg, ep, i, j,
one, zero, invert, print);
} /* ends loop over j */
} /* ends loop over i */
/***************************
*
* if show_hist == 1 then
* display the histogram
* in the lower right hand
* corner of screen
*
****************************/
if( (show_hist == 1) &&
(print == 0)){
if(monitor_type[0] == 'V'){
y_offset = 470;
x_offset = 380;
line_color = 3;
data_color = 8;
}
if(monitor_type[0] == 'E'){
y_offse